* Fix function description message for native compiled lisp functions

	* lisp/help-fns.el (help-fns-function-description-header): Fix
	message.

diff --git a/lisp/help-fns.el b/lisp/help-fns.el
index 9fee156f18f81e8825e19d2c599fe0759ae0c1fe..8287fab3152a301ac272ac29d807b96a731eb034 100644 (file)
--- a/lisp/help-fns.el
+++ b/lisp/help-fns.el
@@ -737,7 +737,7 @@ Returns a list of the form (REAL-FUNCTION DEF ALIASED REAL-DEF)."
                 (aliased
                  (format-message "an alias for `%s'" real-def))
                  ((subr-native-elisp-p def)
-                  "native compiled Lisp function")
+                  (concat beg "native compiled Lisp function"))
                 ((subrp def)
                  (concat beg (if (eq 'unevalled (cdr (subr-arity def)))
                                  "special form"